home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hot Hunks
/
Hot Hunks.iso
/
menu
/
gifv.slq
< prev
next >
Wrap
Text File
|
1993-02-17
|
2KB
|
58 lines
;
; GIFV.SLQ
; This script shows how to use the IFBMP, IFGIF, IFPCX and ENTER commands.
; The PRINTER, PRINTER-ON, PRINTER-OFF and PRINTER-FF commands are used here.
;
; All files in the current directory will be checked against the 3 different
; supported extensions. Depending on the file type, a different counter will
; be incremented. At the end all three counters will be display showing how
; many of each type of file you have!
;
change-path *.*
set v1 0
set v2 0
set v3 0
set v4 0
:toploop
ifbmp :dobmp
ifgif :dogif
ifpcx :dopcx
echo File type is NOT supported!
goto :doloop
:dobmp
set v1 +
goto :doloop
:dogif
set v2 +
goto :doloop
:dopcx
set v3 +
goto :doloop
:doloop
set v4 +
skipnext :exit
goto :toploop
:exit
printer-on
echo Total files processed is displayed below
display V4
echo The number of BMP files is displayed below
display v1
echo The number of GIF files is displayed below
display v2
echo The number of PCX files is displayed below
display v3
printer-ff
printer report.prn
echo Total files processed is displayed below
display V4
echo The number of BMP files is displayed below
display v1
echo The number of GIF files is displayed below
display v2
echo The number of PCX files is displayed below
display v3
printer-off
ENTER